home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 3: CDPD 3 / Almathera Ten on Ten - Disc 3: CDPD3.iso / scope / 001-025 / scopedisk6 / 6809xasm / tst01.a < prev    next >
Text File  |  1995-03-18  |  17KB  |  348 lines
  1.         TTL   Test of the 6809 assembler - #1
  2. DLabel  equ   $10
  3. Label1  EQU   $1234
  4. Label2  equ   $1005
  5.         setdp $1000          set direct page in the assembler
  6.         ORG   $B000
  7.  
  8.         abx                  inherent
  9.  
  10. adca1   adca  #12            immediate
  11.         adca  DLabel         extended
  12.         adca  Label1         extended
  13.         adca  <Label2        forced direct
  14.         adca  >Label1        forced extended
  15.         adca  Label1         extended
  16.         adca  Label2         direct
  17.         adca  ,x             0 bit offset index
  18.         adca  1,x            5 bit offset index
  19.         adca  64,x           8 bit offset index
  20.         adca  4096,x         16 bit offset index
  21.         adca  [,x]           0 bit offset indirect index
  22.         adca  [1,x]          5 bit offset indirect index
  23.         adca  [64,x]         8 bit offset indirect index
  24.         adca  [4096,x]       16 bit offset indirect index
  25.         adca  a,x            'A' register index
  26.         adca  b,x            'B' register index
  27.         adca  d,x            'D' ('A' & 'B') register index
  28.         adca  [a,x]          'A' register indirect index
  29.         adca  [b,x]          'B' register indirect index
  30.         adca  [d,x]          'D' ('A' & 'B') register indirect index
  31.         adca  ,x+            index with 1 post-increment
  32.         adca  ,x++           index with 2 post-increment
  33.         adca  ,-x            index with 1 pre-decrement
  34.         adca  ,--x           index with 2 pre-decrement
  35.         adca  [,x++]         indirect index with post-increment
  36.         adca  [,--x]         indirect index with pre-drecement
  37.         adca  1,pcr          8 bit index from 'PC'
  38.         adca  64,pcr         8 bit index from 'PC'
  39.         adca  <DLabel,pcr    forced 8 bit index from 'PC'
  40.         adca  4096,pcr       16 bit index from 'PC'
  41.         adca  >DLabel,pcr    forced 16 bit index from 'PC'
  42.         adca  [1,pcr]        8 bit indirect index from 'PC'
  43.         adca  [64,pcr]       8 bit indirect index from 'PC'
  44.         adca  [4096,pcr]     16 bit indirect index from 'PC'
  45.         adca  [Label1]       memory indirect
  46.         page
  47. adcb1   adcb  #12            immediate
  48.         adcb  DLabel         extended
  49.         adcb  Label1         extended
  50.         adcb  <Label2        forced direct
  51.         adcb  >Label1        forced extended
  52.         adcb  Label1         extended
  53.         adcb  Label2         direct
  54.         adcb  ,x             0 bit offset index
  55.         adcb  1,x            5 bit offset index
  56.         adcb  64,x           8 bit offset index
  57.         adcb  4096,x         16 bit offset index
  58.         adcb  [,x]           0 bit offset indirect index
  59.         adcb  [1,x]          5 bit offset indirect index
  60.         adcb  [64,x]         8 bit offset indirect index
  61.         adcb  [4096,x]       16 bit offset indirect index
  62.         adcb  a,x            'A' register index
  63.         adcb  b,x            'B' register index
  64.         adcb  d,x            'D' ('A' & 'B') register index
  65.         adcb  [a,x]          'A' register indirect index
  66.         adcb  [b,x]          'B' register indirect index
  67.         adcb  [d,x]          'D' ('A' & 'B') register indirect index
  68.         adcb  ,x+            index with 1 post-increment
  69.         adcb  ,x++           index with 2 post-increment
  70.         adcb  ,-x            index with 1 pre-decrement
  71.         adcb  ,--x           index with 2 pre-decrement
  72.         adcb  [,x++]         indirect index with post-increment
  73.         adcb  [,--x]         indirect index with pre-drecement
  74.         adcb  1,pcr          8 bit index from 'PC'
  75.         adcb  64,pcr         8 bit index from 'PC'
  76.         adcb  <DLabel,pcr    forced 8 bit index from 'PC'
  77.         adcb  4096,pcr       16 bit index from 'PC'
  78.         adcb  >DLabel,pcr    forced 16 bit index from 'PC'
  79.         adcb  [1,pcr]        8 bit indirect index from 'PC'
  80.         adcb  [64,pcr]       8 bit indirect index from 'PC'
  81.         adcb  [4096,pcr]     16 bit indirect index from 'PC'
  82.         adcb  [Label1]       memory indirect
  83.         page
  84. adda1   adda  #12            immediate
  85.         adda  DLabel         extended
  86.         adda  Label1         extended
  87.         adda  <Label2        forced direct
  88.         adda  >Label1        forced extended
  89.         adda  Label1         extended
  90.         adda  Label2         direct
  91.         adda  ,x             0 bit offset index
  92.         adda  1,x            5 bit offset index
  93.         adda  64,x           8 bit offset index
  94.         adda  4096,x         16 bit offset index
  95.         adda  [,x]           0 bit offset indirect index
  96.         adda  [1,x]          5 bit offset indirect index
  97.         adda  [64,x]         8 bit offset indirect index
  98.         adda  [4096,x]       16 bit offset indirect index
  99.         adda  a,x            'A' register index
  100.         adda  b,x            'B' register index
  101.         adda  d,x            'D' ('A' & 'B') register index
  102.         adda  [a,x]          'A' register indirect index
  103.         adda  [b,x]          'B' register indirect index
  104.         adda  [d,x]          'D' ('A' & 'B') register indirect index
  105.         adda  ,x+            index with 1 post-increment
  106.         adda  ,x++           index with 2 post-increment
  107.         adda  ,-x            index with 1 pre-decrement
  108.         adda  ,--x           index with 2 pre-decrement
  109.         adda  [,x++]         indirect index with post-increment
  110.         adda  [,--x]         indirect index with pre-drecement
  111.         adda  1,pcr          8 bit index from 'PC'
  112.         adda  64,pcr         8 bit index from 'PC'
  113.         adda  <DLabel,pcr    forced 8 bit index from 'PC'
  114.         adda  4096,pcr       16 bit index from 'PC'
  115.         adda  >DLabel,pcr    forced 16 bit index from 'PC'
  116.         adda  [1,pcr]        8 bit indirect index from 'PC'
  117.         adda  [64,pcr]       8 bit indirect index from 'PC'
  118.         adda  [4096,pcr]     16 bit indirect index from 'PC'
  119.         adda  [Label1]       memory indirect
  120.         page
  121. addb1   addb  #12            immediate
  122.         addb  DLabel         extended
  123.         addb  Label1         extended
  124.         addb  <Label2        forced direct
  125.         addb  >Label1        forced extended
  126.         addb  Label1         extended
  127.         addb  Label2         direct
  128.         addb  ,x             0 bit offset index
  129.         addb  1,x            5 bit offset index
  130.         addb  64,x           8 bit offset index
  131.         addb  4096,x         16 bit offset index
  132.         addb  [,x]           0 bit offset indirect index
  133.         addb  [1,x]          5 bit offset indirect index
  134.         addb  [64,x]         8 bit offset indirect index
  135.         addb  [4096,x]       16 bit offset indirect index
  136.         addb  a,x            'A' register index
  137.         addb  b,x            'B' register index
  138.         addb  d,x            'D' ('A' & 'B') register index
  139.         addb  [a,x]          'A' register indirect index
  140.         addb  [b,x]          'B' register indirect index
  141.         addb  [d,x]          'D' ('A' & 'B') register indirect index
  142.         addb  ,x+            index with 1 post-increment
  143.         addb  ,x++           index with 2 post-increment
  144.         addb  ,-x            index with 1 pre-decrement
  145.         addb  ,--x           index with 2 pre-decrement
  146.         addb  [,x++]         indirect index with post-increment
  147.         addb  [,--x]         indirect index with pre-drecement
  148.         addb  1,pcr          8 bit index from 'PC'
  149.         addb  64,pcr         8 bit index from 'PC'
  150.         addb  <DLabel,pcr    forced 8 bit index from 'PC'
  151.         addb  4096,pcr       16 bit index from 'PC'
  152.         addb  >DLabel,pcr    forced 16 bit index from 'PC'
  153.         addb  [1,pcr]        8 bit indirect index from 'PC'
  154.         addb  [64,pcr]       8 bit indirect index from 'PC'
  155.         addb  [4096,pcr]     16 bit indirect index from 'PC'
  156.         addb  [Label1]       memory indirect
  157.         page
  158. addd1   addd  #12            immediate
  159.         addd  DLabel         extended
  160.         addd  Label1         extended
  161.         addd  <Label2        forced direct
  162.         addd  >Label1        forced extended
  163.         addd  Label1         extended
  164.         addd  Label2         direct
  165.         addd  ,x             0 bit offset index
  166.         addd  1,x            5 bit offset index
  167.         addd  64,x           8 bit offset index
  168.         addd  4096,x         16 bit offset index
  169.         addd  [,x]           0 bit offset indirect index
  170.         addd  [1,x]          5 bit offset indirect index
  171.         addd  [64,x]         8 bit offset indirect index
  172.         addd  [4096,x]       16 bit offset indirect index
  173.         addd  a,x            'A' register index
  174.         addd  b,x            'B' register index
  175.         addd  d,x            'D' ('A' & 'B') register index
  176.         addd  [a,x]          'A' register indirect index
  177.         addd  [b,x]          'B' register indirect index
  178.         addd  [d,x]          'D' ('A' & 'B') register indirect index
  179.         addd  ,x+            index with 1 post-increment
  180.         addd  ,x++           index with 2 post-increment
  181.         addd  ,-x            index with 1 pre-decrement
  182.         addd  ,--x           index with 2 pre-decrement
  183.         addd  [,x++]         indirect index with post-increment
  184.         addd  [,--x]         indirect index with pre-drecement
  185.         addd  1,pcr          8 bit index from 'PC'
  186.         addd  64,pcr         8 bit index from 'PC'
  187.         addd  <DLabel,pcr    forced 8 bit index from 'PC'
  188.         addd  4096,pcr       16 bit index from 'PC'
  189.         addd  >DLabel,pcr    forced 16 bit index from 'PC'
  190.         addd  [1,pcr]        8 bit indirect index from 'PC'
  191.         addd  [64,pcr]       8 bit indirect index from 'PC'
  192.         addd  [4096,pcr]     16 bit indirect index from 'PC'
  193.         addd  [Label1]       memory indirect
  194.         page
  195. anda1   anda  #12            immediate
  196.         anda  DLabel         extended
  197.         anda  Label1         extended
  198.         anda  <Label2        forced direct
  199.         anda  >Label1        forced extended
  200.         anda  Label1         extended
  201.         anda  Label2         direct
  202.         anda  ,x             0 bit offset index
  203.         anda  1,x            5 bit offset index
  204.         anda  64,x           8 bit offset index
  205.         anda  4096,x         16 bit offset index
  206.         anda  [,x]           0 bit offset indirect index
  207.         anda  [1,x]          5 bit offset indirect index
  208.         anda  [64,x]         8 bit offset indirect index
  209.         anda  [4096,x]       16 bit offset indirect index
  210.         anda  a,x            'A' register index
  211.         anda  b,x            'B' register index
  212.         anda  d,x            'D' ('A' & 'B') register index
  213.         anda  [a,x]          'A' register indirect index
  214.         anda  [b,x]          'B' register indirect index
  215.         anda  [d,x]          'D' ('A' & 'B') register indirect index
  216.         anda  ,x+            index with 1 post-increment
  217.         anda  ,x++           index with 2 post-increment
  218.         anda  ,-x            index with 1 pre-decrement
  219.         anda  ,--x           index with 2 pre-decrement
  220.         anda  [,x++]         indirect index with post-increment
  221.         anda  [,--x]         indirect index with pre-drecement
  222.         anda  1,pcr          8 bit index from 'PC'
  223.         anda  64,pcr         8 bit index from 'PC'
  224.         anda  <DLabel,pcr    forced 8 bit index from 'PC'
  225.         anda  4096,pcr       16 bit index from 'PC'
  226.         anda  >DLabel,pcr    forced 16 bit index from 'PC'
  227.         anda  [1,pcr]        8 bit indirect index from 'PC'
  228.         anda  [64,pcr]       8 bit indirect index from 'PC'
  229.         anda  [4096,pcr]     16 bit indirect index from 'PC'
  230.         anda  [Label1]       memory indirect
  231.         page
  232. andb1   andb  #12            immediate
  233.         andb  DLabel         extended
  234.         andb  Label1         extended
  235.         andb  <Label2        forced direct
  236.         andb  >Label1        forced extended
  237.         andb  Label1         extended
  238.         andb  Label2         direct
  239.         andb  ,x             0 bit offset index
  240.         andb  1,x            5 bit offset index
  241.         andb  64,x           8 bit offset index
  242.         andb  4096,x         16 bit offset index
  243.         andb  [,x]           0 bit offset indirect index
  244.         andb  [1,x]          5 bit offset indirect index
  245.         andb  [64,x]         8 bit offset indirect index
  246.         andb  [4096,x]       16 bit offset indirect index
  247.         andb  a,x            'A' register index
  248.         andb  b,x            'B' register index
  249.         andb  d,x            'D' ('A' & 'B') register index
  250.         andb  [a,x]          'A' register indirect index
  251.         andb  [b,x]          'B' register indirect index
  252.         andb  [d,x]          'D' ('A' & 'B') register indirect index
  253.         andb  ,x+            index with 1 post-increment
  254.         andb  ,x++           index with 2 post-increment
  255.         andb  ,-x            index with 1 pre-decrement
  256.         andb  ,--x           index with 2 pre-decrement
  257.         andb  [,x++]         indirect index with post-increment
  258.         andb  [,--x]         indirect index with pre-drecement
  259.         andb  1,pcr          8 bit index from 'PC'
  260.         andb  64,pcr         8 bit index from 'PC'
  261.         andb  <DLabel,pcr    forced 8 bit index from 'PC'
  262.         andb  4096,pcr       16 bit index from 'PC'
  263.         andb  >DLabel,pcr    forced 16 bit index from 'PC'
  264.         andb  [1,pcr]        8 bit indirect index from 'PC'
  265.         andb  [64,pcr]       8 bit indirect index from 'PC'
  266.         andb  [4096,pcr]     16 bit indirect index from 'PC'
  267.         andb  [Label1]       memory indirect
  268.         page
  269.         andcc #0             immediate
  270. asl1    asla                 inherent
  271.         aslb                 inherent
  272.  
  273.         asl   DLabel         extended
  274.         asl   Label1         extended
  275.         asl   <Label2        forced direct
  276.         asl   >Label1        forced extended
  277.         asl   Label1         extended
  278.         asl   Label2         direct
  279.         asl   ,x             0 bit offset index
  280.         asl   1,x            5 bit offset index
  281.         asl   64,x           8 bit offset index
  282.         asl   4096,x         16 bit offset index
  283.         asl   [,x]           0 bit offset indirect index
  284.         asl   [1,x]          5 bit offset indirect index
  285.         asl   [64,x]         8 bit offset indirect index
  286.         asl   [4096,x]       16 bit offset indirect index
  287.         asl   a,x            'A' register index
  288.         asl   b,x            'B' register index
  289.         asl   d,x            'D' ('A' & 'B') register index
  290.         asl   [a,x]          'A' register indirect index
  291.         asl   [b,x]          'B' register indirect index
  292.         asl   [d,x]          'D' ('A' & 'B') register indirect index
  293.         asl   ,x+            index with 1 post-increment
  294.         asl   ,x++           index with 2 post-increment
  295.         asl   ,-x            index with 1 pre-decrement
  296.         asl   ,--x           index with 2 pre-decrement
  297.         asl   [,x++]         indirect index with post-increment
  298.         asl   [,--x]         indirect index with pre-drecement
  299.         asl   1,pcr          8 bit index from 'PC'
  300.         asl   64,pcr         8 bit index from 'PC'
  301.         asl   <DLabel,pcr    forced 8 bit index from 'PC'
  302.         asl   4096,pcr       16 bit index from 'PC'
  303.         asl   >DLabel,pcr    forced 16 bit index from 'PC'
  304.         asl   [1,pcr]        8 bit indirect index from 'PC'
  305.         asl   [64,pcr]       8 bit indirect index from 'PC'
  306.         asl   [4096,pcr]     16 bit indirect index from 'PC'
  307.         asl   [Label1]       memory indirect
  308.         page
  309. asr1    asra                 inherent
  310.         asrb                 inherent
  311.  
  312.         asr   DLabel         extended
  313.         asr   Label1         extended
  314.         asr   <Label2        forced direct
  315.         asr   >Label1        forced extended
  316.         asr   Label1         extended
  317.         asr   Label2         direct
  318.         asr   ,x             0 bit offset index
  319.         asr   1,x            5 bit offset index
  320.         asr   64,x           8 bit offset index
  321.         asr   4096,x         16 bit offset index
  322.         asr   [,x]           0 bit offset indirect index
  323.         asr   [1,x]          5 bit offset indirect index
  324.         asr   [64,x]         8 bit offset indirect index
  325.         asr   [4096,x]       16 bit offset indirect index
  326.         asr   a,x            'A' register index
  327.         asr   b,x            'B' register index
  328.         asr   d,x            'D' ('A' & 'B') register index
  329.         asr   [a,x]          'A' register indirect index
  330.         asr   [b,x]          'B' register indirect index
  331.         asr   [d,x]          'D' ('A' & 'B') register indirect index
  332.         asr   ,x+            index with 1 post-increment
  333.         asr   ,x++           index with 2 post-increment
  334.         asr   ,-x            index with 1 pre-decrement
  335.         asr   ,--x           index with 2 pre-decrement
  336.         asr   [,x++]         indirect index with post-increment
  337.         asr   [,--x]         indirect index with pre-drecement
  338.         asr   1,pcr          8 bit index from 'PC'
  339.         asr   64,pcr         8 bit index from 'PC'
  340.         asr   <DLabel,pcr    forced 8 bit index from 'PC'
  341.         asr   4096,pcr       16 bit index from 'PC'
  342.         asr   >DLabel,pcr    forced 16 bit index from 'PC'
  343.         asr   [1,pcr]        8 bit indirect index from 'PC'
  344.         asr   [64,pcr]       8 bit indirect index from 'PC'
  345.         asr   [4096,pcr]     16 bit indirect index from 'PC'
  346.         asr   [Label1]       memory indirect
  347. EndLabel equ  $
  348.